* src/fns.c (concat_strings): Clean-up unused variable.

diff --git a/src/fns.c b/src/fns.c
index 251796eb632ec01ff6905b98c082655776c07772..986e26f6ae3e71691f60ec27fea6dca49c165bca 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -923,8 +923,6 @@ concat_strings (ptrdiff_t nargs, Lisp_Object *args)
          for (ptrdiff_t j = 0; j < len; j++)
            {
              int c = XFIXNAT (AREF (arg, j));
-             ptrdiff_t arg_len_byte = CHAR_BYTES (c);
-
              if (dest_multibyte)
                toindex_byte += CHAR_STRING (c, SDATA (result) + toindex_byte);
              else